home *** CD-ROM | disk | FTP | other *** search
/ Interactive Preview: Enemy of the State / Interactive Preview: Enemy of the State.iso / pc / main.dxr / 00499.ls < prev    next >
Encoding:
Text File  |  1998-11-19  |  825 b   |  31 lines

  1. on mouseDown me
  2.   if the movieRate of sprite 5 = 1 then
  3.     nothing()
  4.   else
  5.     set the blend of sprite 28 to 50
  6.     set the blend of sprite 29 to 50
  7.     set the memberNum of sprite the spriteNum of me to 57
  8.     set gapH to the mouseH - the locH of sprite the spriteNum of me
  9.     set gapV to the mouseV - the locV of sprite the spriteNum of me
  10.     repeat while the stillDown
  11.       set the loc of sprite the spriteNum of me to point(the mouseH - gapH, the mouseV - gapV)
  12.       updateStage()
  13.     end repeat
  14.   end if
  15. end
  16.  
  17. on mouseUp me
  18.   if the visible of sprite 5 = 1 then
  19.     nothing()
  20.   else
  21.     if the doubleClick then
  22.       set the visible of sprite 6 to 1
  23.       set the visible of sprite 5 to 1
  24.       repeat with x = 20 to 27
  25.         set the visible of sprite x to 1
  26.       end repeat
  27.       go(95)
  28.     end if
  29.   end if
  30. end
  31.